﻿Public Class TipoActividad
    Inherits BasePersistencia

    Sub New()
        MyBase.Persistencia = EstadoPersistencia.INSERT
    End Sub

    Private _nombre As String
    Private _descripcion As String
    Private _icono As String
    Private _progreso As Boolean
    Private _sector As Sector


    Public Property Nombre() As String
        Get
            Return _nombre
        End Get
        Set(ByVal value As String)
            _nombre = value
        End Set
    End Property

    Public Property Descripcion() As String
        Get
            Return _descripcion
        End Get
        Set(ByVal value As String)
            _descripcion = value
        End Set
    End Property

    Public Property Icono() As String
        Get
            Return _icono
        End Get
        Set(ByVal value As String)
            _icono = value
        End Set
    End Property

    Public Property Sector() As Sector
        Get
            Return _sector
        End Get
        Set(ByVal value As Sector)
            _sector = value
        End Set
    End Property

    Public Property Progreso() As Boolean
        Get
            Return _progreso
        End Get
        Set(ByVal value As Boolean)
            _progreso = value
        End Set
    End Property

    Public Overrides Function ToString() As String
        Return _nombre
    End Function

End Class
